/* =========== HIER GEHT ES NICHT WEITER */
                  z=0;
                  for (i=0;i<500;++i)
                  if (field[i][0]!=0)
                  { o=field[i][0]-1;
                    ox=field[i][1];
                    oy=field[i][2];
                    
                    oox=field[i][3];
                    ooy=field[i][4];  
                   
                    ix=sprite[0][0];
                    iy=sprite[0][1];
                    
                    if (z==0)
                    if ((ix>(ox-r-2)) && (iy>(oy-rr-2    )))
                     if ((ix<(oox+2)) && (iy<(ooy+2) ))  
                     { 
                       /* NORMALER STEIN */
                       if (o<8) 
                       { z=1;
                         // evtl. SOUND
        	             sprite[0][4]=sx ;
                         ax=-ax;
						};
						
						/* ZERSTOERBARER STEIN */ 
                     
                       if ((o>0) && (o<6)) 
                       //if (stmp>8)
                       { //field[i][11]=field[i][11]-1;
                         // evtl. SOUND
 						
					 if (o!=5) {	
					 
					    score=score+10+o*10;
					    zg_score=1;
					    
						// ERSETZEN 
						 SetPort((GrafPtr) myWindow);   
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) black)->portBits,&(((GrafPtr) bsack)->portBits),&re,&ri,srcCopy, 0L);                      
    						                           
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) bsack)->portBits,&(((GrafPtr) btest)->portBits),&re,&ri,srcCopy, 0L);                      
                         
                         // SPRITE ++!! 
					     ++spz;	 
  						 sprite[spz][0]=field[i][1];
  						 sprite[spz][1]=field[i][2];
  						 sprite[spz][2]=field[i][3];
  						 sprite[spz][3]=field[i][4]; } else
  					   { 						// ERSETZEN 
						 SetPort((GrafPtr) myWindow);   
                         SetRect(&re,0,400-32-10-20-4*20,50,400-32-10-4*20);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) banima)->portBits,&(((GrafPtr) bsack)->portBits),&re,&ri,srcCopy, 0L);                      
    						                           
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) bsack)->portBits,&(((GrafPtr) btest)->portBits),&re,&ri,srcCopy, 0L);                      
                         
                         // SPRITE ++!! 
					     ++spz;	 
  						 sprite[spz][0]=field[i][1];
  						 sprite[spz][1]=field[i][2];
  						 sprite[spz][2]=field[i][3];
  						 sprite[spz][3]=field[i][4];
  						 
  						 };

 						 if (o<5) field[i][0]=0;
 						 if (o==5) { // veraenderter Block
 						             field[i][0]=5;
						           };
						}; 
					   
                     
                     }; 
               
  };


 	                sprite[0][0]=sprite[0][4]/10;
	                sprite[0][5]=sprite[0][5]+ay;  
	                sprite[0][1]=sprite[0][5]/10;


                  z=0;
                  for (i=0;i<500;++i)
                  if (field[i][0]!=0)
                  { o=field[i][0]-1;
                    ox=field[i][1]; 
                    oy=field[i][2];
                    
                    oox=field[i][3];
                    ooy=field[i][4];  
                   
                    ix=sprite[0][0];
                    iy=sprite[0][1];
                    
                    if (z==0)
                    if ((ix>(ox-r-2)) && (iy>(oy-rr-2  )))
                     if ((ix<(oox+2)) && (iy<(ooy+2) ))
                     { 
                       /* NORMALER STEIN */
                       if ((o<8) && (o>=0))
                       { z=1;
                         // evtl. SOUND
        	             sprite[0][5]=sy ;
                         ay=-ay;
						};
 
						/* ZERSTOERBARER STEIN */ 
                     
                       if ((o>0) && (o<6)) 
                       //if (stmp>8)
                       { //field[i][11]=field[i][11]-1;
                         // evtl. SOUND
 						
					 if (o!=5) {	
					    score=score+10+o*10;
					    zg_score=1;
						// ERSETZEN 
						 SetPort((GrafPtr) myWindow);   
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) black)->portBits,&(((GrafPtr) bsack)->portBits),&re,&ri,srcCopy, 0L);                      
    						                           
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) bsack)->portBits,&(((GrafPtr) btest)->portBits),&re,&ri,srcCopy, 0L);                      
                         
                         // SPRITE ++!! 
					     ++spz;	 
  						 sprite[spz][0]=field[i][1];
  						 sprite[spz][1]=field[i][2];
  						 sprite[spz][2]=field[i][3];
  						 sprite[spz][3]=field[i][4]; } else
  					   { 						// ERSETZEN 
						 SetPort((GrafPtr) myWindow);   
                         SetRect(&re,0,400-32-10-20-4*20,50,400-32-10-4*20);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) banima)->portBits,&(((GrafPtr) bsack)->portBits),&re,&ri,srcCopy, 0L);                      
    						                           
                         SetRect(&re,field[i][1],field[i][2],field[i][3],field[i][4]);
                         SetRect(&ri,field[i][1],field[i][2],field[i][3],field[i][4]);
                         CopyBits(&((GrafPtr) bsack)->portBits,&(((GrafPtr) btest)->portBits),&re,&ri,srcCopy, 0L);                      
                         
                         // SPRITE ++!! 
					     ++spz;	 
  						 sprite[spz][0]=field[i][1];
  						 sprite[spz][1]=field[i][2];
  						 sprite[spz][2]=field[i][3];
  						 sprite[spz][3]=field[i][4];
  						
  						 
  						 };

 						 if (o<5) field[i][0]=0;
 						 if (o==5) { // veraenderter Block
 						             field[i][0]=5;
						           };
						}; 
        
        }; 
               
  };
